home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / scheme / scm / jackal1a.lha / jacal / manual / macros.tex (.txt) < prev    next >
Encoding:
LaTeX Document  |  1992-12-18  |  699 b   |  15 lines
  1. \chardef\other=12
  2. \def\ttverbatim{\begingroup \catcode`\\=\other \catcode`\{=\other
  3.   \catcode`\}=\other \catcode`\$=\other \catcode`\&=\other
  4.   \catcode`\#=\other \catcode`\%=\other \catcode`\~=\other
  5.   \catcode`\_=\other \catcode`\^=\other
  6.   \obeyspaces \obeylines \tt}
  7. {\obeyspaces\gdef {\ }} % \obeyspaces now gives \ , not \space
  8. \outer\def\begintt{$$\let\par=\endgraf \ttverbatim \parskip=0pt
  9.   \catcode`\|=0 \rightskip=-5pc \ttfinish}
  10. {\catcode`\|=0 |catcode`|\=\other % | is temporary space character
  11.   |obeylines % end of line is active
  12.   |gdef|ttfinish#1^^M#2\endtt{#1|vbox{#2}|endgroup$$}}
  13. \catcode`\|=\active
  14. {\obeylines\gdef|{\ttverbatim\spaceskip=\ttglue\let^^M=\ \let|=\endgroup}}
  15.